DEFINE BUFFER roa FOR ro_det. 
DEFINE BUFFER rob FOR ro_det.


    FOR EACH roa NO-LOCK WHERE roa.ro_op <> 10:

        FIND FIRST rob NO-LOCK WHERE rob.ro_routing = roa.ro_routing AND rob.ro_op = 10 NO-ERROR.
        
        DISP roa.ro_routing roa.ro_op rob.ro_op WHEN AVAILABLE(rob).
    END.
